home *** CD-ROM | disk | FTP | other *** search
/ Shareware Overload Trio 2 / Shareware Overload Trio Volume 2 (Chestnut CD-ROM).ISO / dir31 / telixmod.zip / MODTITLE.PAS < prev    next >
Pascal/Delphi Source File  |  1993-04-26  |  243b  |  12 lines
  1. program MODTITLE;
  2. {Program to find the title of an Amiga Module}
  3. var
  4.   modfile : text;
  5.   modname : string[20];
  6. begin
  7.   assign(modfile, paramstr(1));
  8.   reset(modfile);
  9.   read(modfile,modname);
  10.   writeln('Mod Title : ',modname);
  11. end.
  12.